home *** CD-ROM | disk | FTP | other *** search
/ Chip: Internet / Chip Internet.iso / viewer / browz / src / global.bas < prev   
BASIC Source File  |  1992-11-03  |  686b  |  15 lines
  1. Declare Function getsystemmetrics Lib "User" (ByVal nIndex As Integer) As Integer
  2. Declare Function mciSendstring Lib "MMsystem" (ByVal lpCoMMand As String, ByVal lpReturnString As String, ByVal WReturnLength As Integer, ByVal hCallback As Integer) As Long
  3. Declare Function mciexecute Lib "MMsystem" (ByVal lpCoMMand As String) As Integer
  4. Declare Function mciGetErrorString Lib "MMsystem" (ByVal dwError As Long, ByVal lpBuffer As String, ByVal WReturnLength As Integer) As Integer
  5.  
  6. Global Const SM_CXSCREEN = 0
  7. Global Const SM_CYSCREEN = 1
  8.  
  9. Global wav_path As String
  10. Global mid_path As String
  11. Global fli_path As String
  12. Global flc_path As String
  13. Global dib_path As String
  14.  
  15.